home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
SuperHack
/
SuperHack CD.bin
/
SCRIPTZ
/
DARK.EXE
/
Bawt
/
System
/
POPUPS.INI
< prev
next >
Wrap
INI File
|
1997-03-10
|
4KB
|
145 lines
[mPopup]
n0=Chanserv
n1=.Add A Channel To Login: {
n2= if (%chanserv == $null) {
n3= %chanserv = $?="<channel> <password>, <chan2> <passwd>, <chan3.."
n4= }
n5= else {
n6= %chanserv = %chanserv $+ $chr(44) $?="<chan1> <passwd>, <chan2> <passwd>, <chan3.."
n7= }
n8=}
n9=.Remove A Channel From Login: {
n10= %cut = $$?="Enter Channel To Remove"
n11= %temp = %chanserv
n12= %count = $token(0,44,%temp)
n13= :remove
n14= if (%cut isin $token(%count,44,%temp) && %count == 1) {
n15= %remove = $token(%count,44,%temp) $+ ,
n16= %temp = $remove(%temp,%remove)
n17= goto finish
n18= }
n19= elseif (%cut isin $token(%count,44,%temp)) {
n20= %temp = $remove(%temp,$token(%count,44,%temp))
n21= goto finish
n22= }
n23= else {
n24= dec %count
n25= if (%count > 0) goto remove
n26= }
n27= echo 4 -a %cut was not found in your autologin
n28= return
n29= :finish
n30= %fixchars1 = ,,
n31= %fixchars2 = , ,
n32= %temp = $replace(%temp,%fixchars1,$chr(44))
n33= %temp = $replace(%temp,%fixchars2,$chr(44))
n34= unset %fixchars1 %fixchars2 %count
n35= echo 10 -a Removed %cut from your Auto Login
n36= %chanserv = %temp
n37=}
n38=.Login Channels:d.chanserv.login
n39=Nickserv
n40=.Add A Nick To Login: {
n41= if (%nickserv == $null) {
n42= %nickserv = $?="<nick1> <password>, <nick2> <passwd>, <nick3.."
n43= }
n44= else {
n45= %nickserv = %nickserv $+ $chr(44) $?="<nick1> <passwd>, <nick2> <passwd>, <nick3.."
n46= }
n47=}
n48=.Remove A Nick From Login: {
n49= %cut = $$?="Enter Nick To Remove"
n50= %temp = %chanserv
n51= %count = $token(0,44,%temp)
n52= :remove
n53= if (%cut isin $token(%count,44,%temp) && %count == 1) {
n54= %remove = $token(%count,44,%temp) $+ ,
n55= %temp = $remove(%temp,%remove)
n56= goto finish
n57= }
n58= elseif (%cut isin $token(%count,44,%temp)) {
n59= %temp = $remove(%temp,$token(%count,44,%temp))
n60= goto finish
n61= }
n62= else {
n63= dec %count
n64= if (%count > 0) goto remove
n65= }
n66= echo 4 -a %cut was not found in your autologin
n67= return
n68= :finish
n69= %fixchars1 = ,,
n70= %fixchars2 = , ,
n71= %temp = $replace(%temp,%fixchars1,$chr(44))
n72= %temp = $replace(%temp,%fixchars2,$chr(44))
n73= unset %fixchars1 %fixchars2 %count
n74= echo 4 -a Removed %cut from your Auto Login
n75= %chanserv = %temp
n76=}
n77=.Login:d.nickserv.login
[cPopup]
n0=Advertise:/me is using %ver
n1=Protection
n2=.Add A Channel To Protect: {
n3= if (%chanprot == $null) {
n4= %chanprot = $?="Which Channel(s) ? #Scripter_Help ,#Hell ?"
n5= }
n6= else {
n7= %chanprot = %chanprot $chr(44) $+ $?="Which Channel(s) ? #Scripter_Help ,#Hell ?"
n8= %chanprot = $remove(%chanprot,$chr(32))
n9= }
n10=}
n11=.Remove A Channel From Protection: {
n12= if (%chanprot == $null) {
n13= echo 4 -a There Are No Channels Set To Protect
n14= halt
n15= }
n16= %temp = ""
n17= %done = ""
n18= %cut = $?="Which Channel To Remove?"
n19= %i = 0
n20= %stop = $count(%chanprot,$chr(44)) + 1
n21= :start
n22= inc %i
n23= if (%i > %stop) { goto end }
n24= elseif ($gettok(%chanprot,%i,44) = %cut) {
n25= %done = Yes
n26= goto start
n27= }
n28= else {
n29= %temp = %temp $gettok(%chanprot,%i,44)
n30= goto start
n31= }
n32= :end
n33= if (%done != Yes) {
n34= echo 4 -a The Channel That You Chose To Remove From The List Of Channels Wasnt On The List Of Channels
n35= halt
n36= }
n37= %chanprot = $replace(%temp,$chr(32),$chr(44))
n38= echo 4 -a Channesl To Protect Are: %chanprot
n39= halt
n40=}
[lPopup]
n0=[&P]rotection/AutoOp:/.auser 100 $$1 | /.guser 100 $$1 3 | notice $$1 You are now PROTECTED by %ver
[bPopup]
n0=[-Bawt-]
n1=She&ll to DOS:/run C:\windows\command.com | /echo Shelling to DOS.... | /speak Shell Window Activated, master.
n2=-
n3=Server Information
n4=.List Operators:/stats o
n5=.List K-Lines:/stats k
n6=.List I-Lines:/stats i
n7=.List G-Lines:/stats g
n8=.Trace Server:/trace $?="Enter Server To Trace:"
n9=.View Links:/links
n10=.View Admin Info:/admin
n11=.View Info:/info
n12=.View Map:/map
n13=.Change Server:/se $?="Enter Server Name:" $?="Enter Server Port:"
n14=Join Protected Channels:d.login
n15=-
n16=&Help:/F1